(define (pro3and a b c)
	(and (positive? a)
		(positive? b)
		(positive? c)
		(* a b c)))

(define (pro3or a b c)
	(if (or (negative? a)
		(negative? b)
		(negative? c))
		(* a b c)))
